home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue71 / Stack / WMain.dfm < prev    next >
Encoding:
Text File  |  2001-04-19  |  1.8 KB  |  90 lines

  1. object FMain: TFMain
  2.   Left = 69
  3.   Top = 30
  4.   Width = 658
  5.   Height = 491
  6.   Caption = 'Fast instance construction and destruction'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object paBottom: TPanel
  17.     Left = 0
  18.     Top = 432
  19.     Width = 650
  20.     Height = 32
  21.     Align = alBottom
  22.     BevelOuter = bvNone
  23.     TabOrder = 0
  24.     object btTest: TButton
  25.       Left = 92
  26.       Top = 4
  27.       Width = 75
  28.       Height = 25
  29.       Caption = '&Test'
  30.       TabOrder = 1
  31.       OnClick = btTestClick
  32.     end
  33.     object btClear: TButton
  34.       Left = 176
  35.       Top = 4
  36.       Width = 75
  37.       Height = 25
  38.       Caption = '&Clear'
  39.       TabOrder = 2
  40.       OnClick = btClearClick
  41.     end
  42.     object chMultipleThreads: TCheckBox
  43.       Left = 404
  44.       Top = 8
  45.       Width = 241
  46.       Height = 17
  47.       Caption = 'Simulate multiple threads'
  48.       TabOrder = 3
  49.     end
  50.     object btTrace: TButton
  51.       Left = 8
  52.       Top = 4
  53.       Width = 75
  54.       Height = 25
  55.       Caption = 'T&race'
  56.       Default = True
  57.       TabOrder = 0
  58.       OnClick = btTraceClick
  59.     end
  60.   end
  61.   object paMain: TPanel
  62.     Left = 0
  63.     Top = 0
  64.     Width = 650
  65.     Height = 432
  66.     Align = alClient
  67.     BevelOuter = bvNone
  68.     BorderWidth = 4
  69.     TabOrder = 1
  70.     object meOutput: TMemo
  71.       Left = 4
  72.       Top = 4
  73.       Width = 642
  74.       Height = 424
  75.       TabStop = False
  76.       Align = alClient
  77.       Font.Charset = ANSI_CHARSET
  78.       Font.Color = clWindowText
  79.       Font.Height = -12
  80.       Font.Name = 'Courier New'
  81.       Font.Style = []
  82.       ParentFont = False
  83.       ReadOnly = True
  84.       ScrollBars = ssBoth
  85.       TabOrder = 0
  86.       WantReturns = False
  87.     end
  88.   end
  89. end
  90.